home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 60 / IOPROG_60.ISO / soft / c++ / gsl-1.1.1-setup.exe / {app} / src / cblas / ddot.c < prev    next >
Encoding:
C/C++ Source or Header  |  2002-04-18  |  333 b   |  17 lines
  1. #include <gsl/gsl_math.h>
  2. #include <gsl/gsl_cblas.h>
  3. #include "cblas.h"
  4.  
  5. double
  6. cblas_ddot (const int N, const double *X, const int incX, const double *Y,
  7.         const int incY)
  8. {
  9. #define INIT_VAL  0.0
  10. #define ACC_TYPE  double
  11. #define BASE double
  12. #include "source_dot_r.h"
  13. #undef ACC_TYPE
  14. #undef BASE
  15. #undef INIT_VAL
  16. }
  17.